home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Leser 15 / Amiga Plus Leser CD 15.iso / Tools / Development / AmigaTalk_X / prelude / Object.p < prev    next >
Encoding:
Text File  |  2002-03-13  |  4.8 KB  |  142 lines
  1. pTempVar <- <primitive 110 28 >
  2. <primitive 112 pTempVar 1  " shouldNotImplement: " \
  3.   #( #[ 16r05 16r3A 16r30 16r21 16r0B 16r12 16r31 16r0B 16r12 16rB0 16r72 \
  4.         16r32 16r22 16r33 16r34 16rFA 16r04 16rB5 16rF3 16rF5] \
  5.     #( 'Method ' ' should NOT BE implemented!' 13 'User ERROR:' 'OKAY'  )) >
  6.  
  7. <primitive 112 pTempVar 2  " doesNotUnderstand: " \
  8.   #( #[ 16r05 16r3A 16r30 16r21 16r0B 16r12 16r31 16r0B 16r12 16rB0 16r72 \
  9.         16r32 16r22 16r33 16r34 16rFA 16r04 16rB5 16rF3 16rF5] \
  10.     #( 'Method ' ' NOT understood!' 13 'User ERROR:' 'OKAY'  )) >
  11.  
  12. <primitive 112 pTempVar 3  " notImplemented: " \
  13.   #( #[ 16r05 16r3A 16r30 16r21 16r0B 16r12 16r31 16r0B 16r12 16rB0 16r72 \
  14.         16r32 16r22 16r33 16r34 16rFA 16r04 16rB5 16rF3 16rF5] \
  15.     #( 'Method ' ' NOT implemented!' 13 'User ERROR:' 'OKAY'  )) >
  16.  
  17. <primitive 112 pTempVar 4  " subclassResponsibility: " \
  18.   #( #[ 16r05 16r3A 16r30 16r21 16r0B 16r12 16r31 16r0B 16r12 16rB0 16r72 \
  19.         16r32 16r22 16r33 16r34 16rFA 16r04 16rB5 16rF3 16rF5] \
  20.     #( 'Method ' ' should be implemented in a SubClass!' 13 'User ERROR:' \
  21.         'OKAY'  )) >
  22.  
  23. <primitive 112 pTempVar 5  " shallowCopy " \
  24.   #( #[ 16r20 16rFA 16r01 16r04 16r71 16r21 16r50 16rC7 16rF7 16r04 16r20 \
  25.         16rF3 16rF8 16r1A 16rF2 16r20 16rA4 16rA0 16r72 16r51 16r21 \
  26.         16rB2 16rE1 16r03 16r0B 16r22 16r23 16r20 16r23 16rFA 16r02 \
  27.         16r6F 16rFA 16r03 16r70 16rF3 16rB3 16rF2 16r22 16rF3 16rF2 \
  28.         16rF5] \
  29.     #(  )) >
  30.  
  31. <primitive 112 pTempVar 6  " respondsTo: " \
  32.   #( #[ 16r20 16rA4 16r21 16r0B 16r2A 16rF3 16rF5] \
  33.     #(  )) >
  34.  
  35. <primitive 112 pTempVar 7  " printString " \
  36.   #( #[ 16r20 16r0A 16r11 16rF3 16rF5] \
  37.     #(  )) >
  38.  
  39. <primitive 112 pTempVar 8  " printNoReturn " \
  40.   #( #[ 16r20 16rA9 16rFA 16r01 16r78 16rF2 16rF5] \
  41.     #(  )) >
  42.  
  43. <primitive 112 pTempVar 9  " print " \
  44.   #( #[ 16r20 16rA9 16rFA 16r01 16r79 16rF2 16rF5] \
  45.     #(  )) >
  46.  
  47. <primitive 112 pTempVar 10  " notNil " \
  48.   #( #[ 16r5B 16rF3 16rF5] \
  49.     #(  )) >
  50.  
  51. <primitive 112 pTempVar 11  " next " \
  52.   #( #[ 16r5D 16rF3 16rF5] \
  53.     #(  )) >
  54.  
  55. <primitive 112 pTempVar 12  " isNil " \
  56.   #( #[ 16r5C 16rF3 16rF5] \
  57.     #(  )) >
  58.  
  59. <primitive 112 pTempVar 13  " isMemberOf: " \
  60.   #( #[ 16r21 16r20 16rA4 16rB6 16rF3 16rF5] \
  61.     #(  )) >
  62.  
  63. <primitive 112 pTempVar 14  " isKindOf: " \
  64.   #( #[ 16r20 16rA4 16r72 16r22 16rA2 16rF7 16r10 16r22 16r21 16rB6 16rF7 \
  65.         16r02 16r5B 16rF3 16rF2 16r22 16r0A 16r2E 16rF1 16r72 16rF2 \
  66.         16rF9 16r14 16rF2 16r5C 16rF3 16rF5] \
  67.     #(  )) >
  68.  
  69. <primitive 112 pTempVar 15  " error: " \
  70.   #( #[ 16r21 16r20 16rFA 16r02 16r7A 16rF2 16rF5] \
  71.     #(  )) >
  72.  
  73. <primitive 112 pTempVar 16  " do:without: " \
  74.   #( #[ 16r22 16r5D 16rB6 16rF6 16r1A 16r20 16rA6 16r73 16r23 16rA2 16rF7 \
  75.         16r10 16r23 16r22 16rB7 16rF7 16r03 16r21 16r23 16rB5 16rF2 \
  76.         16r20 16rA7 16rF1 16r73 16rF2 16rF9 16r14 16rF3 16rF8 16r04 \
  77.         16rF2 16r20 16r21 16rB3 16rF2 16rF5] \
  78.     #(  )) >
  79.  
  80. <primitive 112 pTempVar 17  " do: " \
  81.   #( #[ 16r20 16rA6 16r72 16r22 16rA2 16rF7 16r0B 16r21 16r22 16rB5 16rF2 \
  82.         16r20 16rA7 16rF1 16r72 16rF2 16rF9 16r0F 16rF3 16rF5] \
  83.     #(  )) >
  84.  
  85. <primitive 112 pTempVar 18  " first " \
  86.   #( #[ 16r20 16rF3 16rF5] \
  87.     #(  )) >
  88.  
  89. <primitive 112 pTempVar 19  " deepCopy " \
  90.   #( #[ 16r20 16rFA 16r01 16r04 16r71 16r21 16r50 16rC7 16rF7 16r04 16r20 \
  91.         16rF3 16rF8 16r1C 16rF2 16r20 16rA4 16rA0 16r72 16r51 16r21 \
  92.         16rB2 16rE1 16r03 16r0D 16r22 16r23 16r20 16r23 16rFA 16r02 \
  93.         16r6F 16r0A 16r15 16rFA 16r03 16r70 16rF3 16rB3 16rF2 16r22 \
  94.         16rF3 16rF2 16rF5] \
  95.     #(  )) >
  96.  
  97. <primitive 112 pTempVar 20  " copy " \
  98.   #( #[ 16r20 16r0A 16r2A 16rF3 16rF5] \
  99.     #(  )) >
  100.  
  101. <primitive 112 pTempVar 21  " class " \
  102.   #( #[ 16r20 16rFA 16r01 16r01 16rF3 16rF5] \
  103.     #(  )) >
  104.  
  105. <primitive 112 pTempVar 22  " yourself " \
  106.   #( #[ 16r20 16rF3 16rF5] \
  107.     #(  )) >
  108.  
  109. <primitive 112 pTempVar 23  " asSymbol " \
  110.   #( #[ 16r20 16r0A 16r11 16r0A 16r12 16rF3 16rF5] \
  111.     #(  )) >
  112.  
  113. <primitive 112 pTempVar 24  " asString " \
  114.   #( #[ 16r20 16rA4 16rFA 16r01 16r98 16rF3 16rF5] \
  115.     #(  )) >
  116.  
  117. <primitive 112 pTempVar 25  " ~= " \
  118.   #( #[ 16r20 16r21 16rC9 16rAC 16rF3 16rF5] \
  119.     #(  )) >
  120.  
  121. <primitive 112 pTempVar 26  " = " \
  122.   #( #[ 16r20 16r21 16rB6 16rF3 16rF5] \
  123.     #(  )) >
  124.  
  125. <primitive 112 pTempVar 27  " ~~ " \
  126.   #( #[ 16r20 16r21 16rB6 16rAC 16rF3 16rF5] \
  127.     #(  )) >
  128.  
  129. <primitive 112 pTempVar 28  " == " \
  130.   #( #[ 16r20 16r21 16rFA 16r02 16r07 16rF3 16rF5] \
  131.     #(  )) >
  132.  
  133. <primitive 98 #Object \
  134.   <primitive 97 #Object #Object #AmigaTalk:General/Object.st \
  135.    #(  ) \
  136.    #( #shouldNotImplement: #doesNotUnderstand: #notImplemented:  \
  137.        #subclassResponsibility: #shallowCopy #respondsTo: #printString #printNoReturn #print #notNil  \
  138.        #next #isNil #isMemberOf: #isKindOf: #error: #do:without: #do: #first  \
  139.        #deepCopy #copy #class #yourself #asSymbol #asString #~= #= #~~ #==  ) \
  140.   pTempVar 4 7 > #ordinary >
  141.  
  142.